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Wilf Hey deceives 
the western eye, 
raises a hue and 
cry and finds 
printer support 
for the Danish 
alphabet. 


nature, said England’s greatest poet. (I’m lying, of course — 

I made up that quote a few moments ago). Deceit marked 
the beginning of the friendship between Barbie and I — but thank- 
fully it didn’t prevent our growing love and eventual marriage. 

I had met Barbie on a Saturday, and finding that we worked for 
the same large firm we arranged to have lunch in the company 
cafeteria on Monday. At the appointed hour I went to Barbie’s 
office to find her department empty. I went up to the seventh floor 
cafeteria, but could not see her. Ever hopeful, I went back down to 
her office and left a note that I would be in the cafeteria waiting. 
Eventually hunger got the better of me; I chose a meal, ate alone, 
and went back to my own office. 

On my desk was a note from Barbie explaining that she was in 
the cafeteria waiting for me. I rushed upstairs, eventually found 
her, and we both joined the queue for a meal; I was determined not 
to let her think I had given up waiting for her, so I didn’t let her 
know I had already eaten. 

Two years later — we were married by then — Barbie told some- 
body of our first meal together: I learned that she herself had given 
up on me arriving and had already lunched; we had deceived each 
other — both having a second meal. 

The last generation noted the change in business excuses — pos- 
sibly the most common form of deceit we encounter daily. We 
began to hear more often, ‘the computer messed it up’ or ‘it is a 
computer error’. 

Now I detect a more subtle change. Since the message that the 
computer cannot do anything without the aid of the programmer, I 
am hearing ‘they programmed the computer wrong’ and similar 
phrases to cover bad service. I am upset by this; it is no longer a 
nice, impersonal excuse like the deceptions of yesteryear — we 
could take those in our stride. Besides, these excuses, voiced by 
some computer illiterates, are becoming disturbingly close to the 
unfortunate truth. 


BUTTONS AND BOWS 

I hope you have noticed the buttons we have incorporated in the 
layout of the SuperDisk screen in recent months: it’s designed so 
that the buttons look three-dimensional. Try choosing the pull- 
down menu by pressing a function key to see what I mean. Several 
people have written or called asking how this was done — some of 
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them already using the Clockwork Software’s FromBAT language 
in which the control program is written each month. To some, I 
have already sent samples that handle 3D switches, demonstrating 
it to be a fairly simple process. I actually noted how Visual Basic 
for DOS displays in ordinary text mode, and created routines to 
accomplish the same effect. : 

The secret of creating depth is to note the psychology of vision. 
In the West we decided centuries ago to read from left to right, top 
to bottom. Perhaps this leads us to think it natural to have a light 
source above and to the left — for no good reason. 

I (and others before me) have simply used this fact in the fol- 
lowing way: 


1 If a button protrudes from a surface, the light source (to the north- 
west) would be caught by the west and north sides of the button; 
the other sides would be in relative darkness. 


2 If a button is recessed below a surface, the light source (to the 
north-west) would be caught by the east and south sides of the 
recess; the other sides would be in relative darkness. 


3 If you are consistent with this shading and there are several 
objects seeming to catch light from the north-west, the effect will 
be stronger than with just one object. 


THE TECHNIQUE 

On this month’s SuperDisk I have included some routines written 
in the FromBAT language to demonstrate the technique — simply 
using the single-line box-border characters that come with extended 
ASCII. One of these shows how to make a bank of switches, each 
of which works as an independent push on/push off switch. The 
other makes a bank of switches that are interrelated — only one can 
be on at a time. In the past I have always known of these but 
referred to as Radio buttons (presumably because they work in a 
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Demonstration of RADIO buttons 


@ The three dimensional effect in this example of radio buttons is achieved by shading 
and lighting. The collective effect is quite strong - button three really looks pressed in 
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similar manner to the tuning push-buttons on a car radio). Within 
Visual Basic 2.0 these are called Choice buttons — so I guess it 
would be quite a good idea to get used to that term as quickly as 
possible to avoid confusion later on. 

SWITCH.BAT is the input source for FromBAT, and 
SWITCH:COM will show you how it operates; look at 
RADIO.BAT and RADIO.COM in the same relationship. 

It’s also quite easy to make similar buttons and switches in other 
languages — including GW-Basic. In my own experimentation I 
found that the results are best if you use SCREEN 0 and COLOR 8 
(bright black) as your normal foreground, and COLOR 7 (white) as 
your normal background. Then sides in the light can take on 
COLOR 15 (bright white) and sides in shadow take on COLOR 0 
(black). You can set up the screen to these specifications with the 
following code: 
100 COLOR 8,7: CLS 
I have written a subroutine that will display a three-dimensional 
button at the current location: it will be three rows by five columns 
in size, and shaded to appear either pressed in (with NW = 0) or 
popping out (with NW = 15). Simply set the value of NW to the 
number of the colour desired for the north-west corner: only 0 and 
15 are valid. 


10000 ROW=CSRLIN 

10010 COL=POS (COL) 

10020 COLOR NW 

10030 PRINT CHRS (218) +STRINGS (3,196) 
10040 LOCATE,COL 

10050 PRINT CHR$(179) 

10060 LOCATE,COL 

10070 PRINT CHRS (192) 

10080 COLOR 15 - Nw 

10090 LOCATE ROW, COL+4 

10100 PRINT CHRS$ (191) 

10110 LOCATE, COL+4 

10120 PRINT CHRS$ (179) 

10130 LOCATE, COL+1 

10140 PRINT STRINGS (3,196) +CHRS (217) 
10150 LOCATE ROW,COL 

10160 RETURN 


Depending on how you want to handle it, you could leave out line 
10150 — it just sets things back to normal. 

If you want to see the results of this subroutine, code the follow- 
ing little program to test it; the first button drawn should look to 
you as if it is pressed inward, and the second — up one row and a lit- 
tle to the right — should look as if it is popped up. 


100 COLOR 8,7: CLS 
110 LOCATE 10,22 
120 NW = 0 

130 GOSUB 10000 
140 LOCATE 9,38 
150 NW = 15 

160 GOSUB 10000 


170 STOP 


If you want to simulate the temporary pressing of a button, try 
something like this: 


100 COLOR 8,7: 
110 WHILE 1 
120 NW = 15 
130 LOCATE 10,37 

140 GOSUB 10000 

150 WHILE LEN (INKEYS) >0 
160 WHILE NW = 15 
170 X$ = INKEYS 

180 IF X$ = CHRS$(27) 
190 IF LEN(XS) 
200 WEND 

210 GOSUB 10000 
220 LOCATE 13,36 

230 PRINT “PRESSED” 

240 A = TIMER: B=A 
250 WHILE TIMER —- A < 1 
260 LOCATE 13,36 

270 PRINT SPACES (7) 

280. WEND 


CLS 


: WEND 


THEN STOP 
> 0 THEN NW = 0 


: WEND 


When you execute this code, you will find before you on the screen 
a button: keying [ESC] will stop the program, but any other key 
will cause the button.to be pressed for about a second. By the way, 
note the use of WHILE and WEND in some of the lines where you 
might expect a GOTO. In fact, the only line number actually used is 
for the GOSUB — and that is inevitable (in GW-Basic). As you 
move from GW-Basic to other programming languages you will 
find line numbers rare; in most of them, a name is used — and then 
only when it is needed for reference. Most also disdain (quite 
rightly) the GOTO command (or its equivalent) as being literally 
just a timewaster. For these reasons I strongly urge GW-Basic pro- 
grammers to apply coding techniques (loops within loops, for 
example) that will minimise the number of changes you will have 
to make when importing your program into a different program- 
ming language. 


HUE AND CRY 

Paul Grosse, whose Mah Jong recently appeared on the SuperDisk, 
wrote to tell me that issue 77 of PC PLUS had some misinforma- 
tion about colour coding for VGA (Video Graphics Array), 
confusing the terms hue and colour. He couldn’t remember where, 
but was sure of his facts. 

I had just created a little program in Visual Basic 2.0 
(COLOUR.MAK and COLOUR.BAS, on this month’s SuperDisk) 
that Matt Nicholson thought might be a good example for certain 
techniques — and it translates between the two concepts of colour 
and hue. So I had appointed myself an expert on the subject, and 
began searching through the magazine in an attempt to find the 
offending statements. 

I couldn’t find the error, so I called Paul by telephone and 
insisted that I wouldn’t hang up until he helped me locate it. We 
searched, piecing together the fragments of his memory about it — 


WINDOWS - CHAMPION OF THE DANISH ALPHABET 


| have received several letters from Denmark 


20000 COLOR ,4 


that confirm my suspicion (announced back in PC 
PLUS issue 74) that ‘barberskum’ means shaving 
foam there. Bo Eriksen (of Kielstrupvej) takes 
the opportunity to ask about how various mem- 
ory calculations (including the About in Windows 


|| Help) relate: he can’t make the figures tally. 
Bo rejoices in the printer facilities offered in 


Windows 3.1, remarking that unlike the 
resources in many other program suites, 
Windows has no trouble dealing with the six 
additional letters in the Danish alphabet. 

Finn Hammer, a fodterapeut (chiropodist) in 


Hobrovej asks whether he could incorporate into 
his display programs the growing and shrinking 
rectangle that opens and closes the SuperDisk 
control program each month. The method is 
quite easy in assembler language, but | don’t 
think that kind of answer is very helpful, so here 
is a GW-Basic sub-routine to explode a box onto 
the screen in SCREEN 0 mode. Before you call it, 
you should set values in parameters ROW, COL, 
ROWS and COLS: the first two provide the coor- 
dinates for the top left corner of the box once it 
is exploded, and the other two describe the 
dimensions of the box. 
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20100 
20200 
20300 


20400 
20500 
20600 
20700 
20800 
20900 
21000 
21100 
21200 


FOR I = 1 TO ROWS/2 
FOR J = 1 to I+1 
LOCATE ROW+ROWS/2-I+J-1, 
COL+COLS/2 - I*COLS/ROWS 
PRINT SPC(2*1I*COLS/ROWS) 
NEXT 
SOUND (32767,2) 
NEXT 
FOR I = 1 TO ROWS 
LOCATE ROW+I-1, COL 
PRINT SPC(COLS) 
NEXT 
RETURN 


Calour Selection 


Saturation Brightness 


@ An alternative to RGB shade description is to manipulate a colour by altering its hue, 
saturation and brightness values 


and then found it on page 341, within Help Screen. The culprit — 
one Wilf Hey. 

In the item headed Colour Madness, I loosely spoke about dif- 
ferent colours that ‘can be derived by assigning numbers to the 
three values’ that encode a number, and that ‘higher numbers pro- 
duce brighter hues’. This may make perfect sense in English, where 
colour and hue are synonyms, but in the world of optics matters are 
quite different. 

Red, green and blue are the primary colours, and each of the 
three numbers used to describe a shade indicate the intensity of one 
of those three primaries within it. This is called the RGB number of 
the shade, and is often recorded as a six-digit hexadecimal number. 
For example, a particularly disgusting shade of pink has the RGB 
number 9300FF — hexadecimal encoding for 147 (blue), 0 (green) 
and 255 (red). 

Another way of describing a shade is in terms of its hue, satura- 
tion, and brightness: that violent shade of pink actually has a hue 
partway between magenta and red (42 percent along the path to red, 
to be precise), and its Saturation and Brightness levels are both set 
to 100 percent. 

In the program Colour, you will be able to choose one of six 
hues (red, green and blue are called primaries, while magenta, yel- 
low and cyan are called secondaries). You can then adjust the 
leftmost slider to a percentage, shading off toward one of the neigh- 
bouring hues. The other two sliders adjust saturation (how much of 
the hue is actually used within a chosen colour) and brightness. The 
larger box on the right is a patch of the chosen colour, and below it 
are the RGB equivalent values. 


COLLARING COLOURS 

There are a few tricks, easy in themselves, that I used in the writing 
of the Colour program. One was to colour the picture boxes that go 
down the side of the first slider, for adjusting the hue being used. I 
made these empty picture boxes, but colour their background 
depending on which hue has been chosen: when blue is the selected 
hue, these boxes show various shades of blue; when red is chosen, I 
colour these little boxes various shades of red. These shades are 
calculated and painted into the boxes by the Subroutine 

Opt ionHue_Click: the picture boxes are grouped together as a 
Dim or array, Shade () . 

When a hue is chosen, Opt ionHue_Click is automatically 
executed, and depending on what hue is chosen two For/Next loops 
are set up, calling another routine named Set RGB with four param- 
eters: the box number (I) and the appropriate R,G and B values. 
This new routine is simply a short form for: 

Shade (I) .BackColor = RGB(R,G,B) 
(RGB is a Visual Basic 2.0 instruction to mix these proportions of 
red, green and blue to form a colour). 

Another trick is that you don’t have to click on the fiddly little 
radio switches to change the hue being used; you can click any- 
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where on the coloured box to the right of one of the switches. How 
did I perform that little bit of magic? 

If you look at the routine list you will find several named 
PictureN_Click() where N is a number between two and nine. 
These each have a single instruction within them... 


OptionHue(X) = True 


...where X is a number between zero and seven. In fact, 
OptionHue (xX) is the name of the individual switch immediately 
to the left of each box. It so happens that when you set one of the 
OptionHue() switches to True, two things happen: 


1 All the other Opt ionHue () switches are set to False. 


2 The Opt ionHue_Click() subroutine is executed — automati- 
cally — just as if you had clicked on the actual option switch. 


Test this for yourself: click on one of the coloured boxes, and see 
the radio switches change. Also note that the little spectrum boxes 
running down the side of the first slider will change appropriately 
as well. That was due to the hard-work of the Opt ionHue_Click 
subroutine — already in-built for you as part of Visual Basic 2. 

Isn’t that neat? Do you think you will ever want to go back from 
using Visual Basic? @ 


Tips, tricks and arguments gratefully received at: 


Wilf’s Programmers’ Workshop 
PC PLUS 

Seven Dials 

Saw Close 

Bath 

BA1 LEN 


OOPS AGAIN 


Bill Pearce (Great Sankey, Warrington) writes on the Object Oriented 
Programming (OOP) controversy; he insists that not only is all program- 
ming object oriented, but all thinking and acts of perception are too. 
He defines object orientation as ‘recognising an object that passes the 
test for that object’. This, | recall from my philosophy lectures, is Plato’s 
theory of forms - that we have an idealised concept a tree, and contin- 
ually match things with that concept to test whether the object in 
question has enough ‘treeness’ to be identified as a genuine tree. 

Though | hate to defend the pretentious rubbish of those who 
stand up and cite, several times a day, the five characteristics of OOP, | 
think Bill has missed the main point about OOP. 

Little about OOP is really new, but it does represent a new way of 
seeing things. We used to see a program as a recipe, or as a set of 
sequential instructions; with OOP we are able to see things as objects 
with an independent existence of their own - whether these objects 
are pieces of data, fragments of code, or even occasional procedures 
that must be performed. 

| find it easiest to think of OOP in terms of an interactive computer 
game, encompassing both heroes and hazards that work independently 
- guided by chance and by what they encounter. In essence, each char- 
acter in this little drama can be thought of as a computer program in 
itself - an ‘object’. It can be defined best in terms of what happens to 
it, and how it affects other objects. This is an easier, more imaginative 
and more productive way of viewing the entire game program; this 
approach makes modelling, modification and testing a lot easier. 
Another advantage is that you can pluck whole objects (or classes of 
objects) out of one program and place them in another. This is obvious 
when our object is Barnacle Bob, moving from one game to another. 
It's perhaps less obvious when we are extracting a Current Valuation 
object from one program into another. | 

Bill thinks that ‘in many respects computing has passed its peak and 
we are now in an age of gimmickry’. | am not so cynical: | believe we 
can soon begin to consolidate 40 years of computing experience, and 
turn our energies toward more important issues. That is, as long as we 
can get past the ‘flavour of the month’ brigade that simply lap up 
whatever new terminology is thrown at them. 

Your welcome comments, Bill, have earned you a copy of FromBAT. 
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